home *** CD-ROM | disk | FTP | other *** search
/ How Would You Survive? / How Would You Survive (1995)(Grolier)[Mac-PC].iso / mac / AZTECW.DIR / 01708_Script_Market < prev    next >
Text File  |  1995-09-12  |  926b  |  39 lines
  1. global gQuest, gBeenClicked
  2.  
  3. on AMarketRollovers1
  4.   set gBeenClicked = 0
  5.   if (not(CheckClickedStatus(gQuest))) then
  6.     if rollover(6) then
  7.       repeat while rollover(6)
  8.         AztecCursor
  9.         puppetsprite 7, true
  10.         set the locH of sprite 7 to 419
  11.         set the locV of sprite 7 to 241
  12.         updatestage
  13.         if the mousedown then
  14.           set GBeenClicked = 1
  15.         else
  16.           repeat while gBeenClicked = 1
  17.             set the locH of sprite 7 to 819
  18.             AnimateLoopFast 6, 833, 5, 0, 2
  19.           end repeat
  20.         end if
  21.       end repeat
  22.       set the locH of sprite 7 to 919
  23.       puppetsprite 7, false
  24.       updatestage
  25.     else
  26.       if rollover(41) then
  27.         HandCursor
  28.       else
  29.         if rollover(42) then
  30.           HandCursor
  31.         else
  32.           ArrowCursor
  33.         end if
  34.       end if
  35.     end if
  36.   end if
  37.   RandomQuestion(gQuest)
  38. end
  39.